﻿// ------------------------------------------------------------------------
// 版权信息
// 版权归重庆虫儿飞科技有限公司所有。
// 所有权利保留。
// 官方网站：https://netokit.com
// 许可证信息
// Neto.Kit 项目主要遵循 MIT 许可证和 Apache 许可证（版本 2.0）进行分发和使用。
// 许可证的完整文本可以在源代码树根目录中的 LICENSE-APACHE 和 LICENSE-MIT 文件中找到。
// 
// 使用条款
// 使用本代码应遵守相关法律法规和许可证的要求。
// 
// 免责声明
// 对于因使用本代码而产生的任何直接、间接、偶然、特殊或后果性损害，我们不承担任何责任。
// 
// 其他重要信息
// Neto.Kit 项目的版权、商标、专利和其他相关权利均受相应法律法规的保护。
// 有关 Neto.Kit 项目的其他详细信息，请参阅位于源代码树根目录中的 COPYRIGHT 和 DISCLAIMER 文件。
// 
// 更多信息
// 请访问 https://netokit.com 获取更多关于 Neto.Kit 项目的许可证和版权信息。
// ------------------------------------------------------------------------

#region

using System.Globalization;

#endregion

namespace System.ComponentModel.DataAnnotations;

/// <summary>
///     EnumDataType
/// </summary>
public class BeeleKitEnumDataTypeAttribute : BeeleKitDataTypeAttribute
{
    public BeeleKitEnumDataTypeAttribute(Type enumType)
        : base("Enumeration")
    {
        EnumType = enumType;
    }

    public Type EnumType { get; }

    /// <summary>
    /// </summary>
    /// <param name="value"></param>
    /// <returns></returns>
    /// <exception cref="InvalidOperationException"></exception>
    public override bool IsValid(object? value)
    {
        if (EnumType == null) throw new InvalidOperationException("The enumeration type cannot be empty");
        if (!EnumType.IsEnum) throw new InvalidOperationException("The incoming data needs to be of enumeration type");

        if (value == null) return true;
        var stringValue = value as string;
        if (stringValue?.Length == 0) return true;

        var valueType = value.GetType();
        if (valueType.IsEnum && EnumType != valueType)
            // don't match a different enum that might map to the same underlying integer
            return false;

        if (!valueType.IsValueType && valueType != typeof(string))
            // non-value types cannot be converted
            return false;

        if (valueType == typeof(bool) ||
            valueType == typeof(float) ||
            valueType == typeof(double) ||
            valueType == typeof(decimal) ||
            valueType == typeof(char))
            // non-integral types cannot be converted
            return false;

        object convertedValue;
        if (valueType.IsEnum)
        {
            Debug.Assert(valueType == value.GetType(), "The valueType should equal the Type of the value");
            convertedValue = value;
        }
        else
            try
            {
                convertedValue = stringValue != null
                    ? Enum.Parse(EnumType, stringValue, false)
                    : Enum.ToObject(EnumType, value);
            }
            catch (ArgumentException)
            {
                // REVIEW: is there a better way to detect this
                return false;
            }

        if (IsEnumTypeInFlagsMode(EnumType))
        {
            // REVIEW: this seems to be the easiest way to ensure that the value is a valid flag combination
            // If it is, the string representation of the enum value will be something like "A, B", while
            // the string representation of the underlying value will be "3". If the enum value does not
            // match a valid flag combination, then it would also be something like "3".
            var underlying = GetUnderlyingTypeValueString(EnumType, convertedValue)!;
            var converted = convertedValue.ToString();
            return !underlying.Equals(converted);
        }

        return Enum.IsDefined(EnumType, convertedValue);
    }

    private static bool IsEnumTypeInFlagsMode(Type enumType)
    {
        return enumType.IsDefined(typeof(FlagsAttribute), false);
    }

    private static string? GetUnderlyingTypeValueString(Type enumType, object enumValue)
    {
        return Convert.ChangeType(enumValue, Enum.GetUnderlyingType(enumType), CultureInfo.InvariantCulture).ToString();
    }
}